home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / jazclib1.arc / JZKEYSTS.C < prev    next >
Encoding:
C/C++ Source or Header  |  1986-05-06  |  670 b   |  21 lines
  1. #include <jaz.h>
  2. /*
  3. ┌────────────────────────────────────────────────────────────────────────────┐
  4. │jzkeysts.c                                     │
  5. │Return the union KEYSTATE as defined in jaz.h                     │
  6. │This defines the various shift states of the machine.                 │
  7. │Warning, this routine is very highly IBM specific. Contact me for porting   │
  8. │to other machines.                                 │
  9. │-Jaz                                         │
  10. │                                         │
  11. │ (C) JazSoft Software by Jack A. Zucker (301) 794-5950              │
  12. └────────────────────────────────────────────────────────────────────────────┘
  13. */
  14. jzkeysts(fkey)
  15. KEYSTATE *fkey;
  16. {
  17.   unsigned int wkey;
  18.   wkey = MEMW(0x40,0x17);
  19.   memcpy(fkey,&wkey,2);
  20. }
  21.